home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 726-750 / 744 / fo2 / sources_fo2 / misc.c < prev    next >
C/C++ Source or Header  |  1995-03-18  |  937b  |  55 lines
  1. #include "defs.h"
  2.  
  3. Prototype D2Str(ULONG decimal);
  4. Prototype putIText(BYTE *text);
  5. Prototype printCYL(LONG    cyl);
  6.  
  7. extern BYTE BufferD2Str[]; 
  8.  
  9. extern struct Gadget Gadget17;
  10. extern struct Gadget Gadget18;
  11.  
  12. D2Str(decimal)
  13. ULONG decimal;
  14. {
  15. BYTE  *string,n;
  16. ULONG m,a_enlever;
  17. BOOL  init=1;
  18.  
  19.     string=&BufferD2Str[0];
  20.  
  21.     m=1000000000;
  22.     init=1;
  23.     for (n=0 ; n!=10 ;n++)
  24.     {
  25.         a_enlever=(0xFF & (decimal/m));
  26.         string[n]=a_enlever + '0';
  27.         string[n+1]='\0';
  28.         decimal -= a_enlever*m;
  29.         m/=10;
  30.         if (!m) break;
  31.         if (string[n]=='0' && init) n--;
  32.         else init=0;
  33.     }
  34. }
  35.  
  36. putIText(text)
  37. BYTE *text;
  38. {
  39.  
  40.     RemoveGList(FOWin,&Gadget18,1);
  41.     Gadget18.GadgetText->IText=text;
  42.     AddGList(FOWin,&Gadget18,18,1,0);
  43.     RefreshGList(&Gadget18,FOWin,0,1);
  44. }
  45.  
  46. printCYL(cyl)
  47. LONG    cyl;
  48. {
  49.     RemoveGList(FOWin,&Gadget17,1);
  50.     D2Str(cyl);
  51.     if (BufferD2Str[1]==0) {BufferD2Str[1]=' '; BufferD2Str[2]=0;}
  52.     AddGList(FOWin,&Gadget17,18,1,0);
  53.     RefreshGList(&Gadget17,FOWin,0,1);
  54. }
  55.